home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
422mods.zip
/
TPOH002.422
< prev
next >
Wrap
Text File
|
1993-03-03
|
7KB
|
240 lines
TPOH002.MOD look at it.. woooooooooooooooooow!
Shadow Lord #152 @27458
Sat Feb 20 10:55:26 1993
┌───────────────────────────────────────────────────────────────────────────┐
│ Mod Name : TPOH002.MOD Mod Author: 3Shadow 1Lord 0│
│ Difficulty : Must have a Brain!! Date : February 19, 1993 │
│ WWIV Version : 4.22+ maybe.. │
│ Files Affected: BBS.C VERDEC.H │
│ Description : Gives a BBS another System Password.. and an internal INIT│
│ <sort of> to configure the password!!! And a password to enter the INIT! │
└───────────────────────────────────────────────────────────────────────────┘
Well this is onlt my second mod.. so if i make a mistake, suck me! hehe
I mainly made this mod because 1 LAZER #154 @8560 needed a system password
for his little brother, so he couldn't get into the INIT.EXE and have fun..
6DISCLAIMER0: I made the mod, you installed it.. your fault! If your goldfish
commits suicide and jumps out of the fish bowl, and your cat eats
the fish, and your dog eats the cat, your vulture eats the dog,
your missle silo explodes killing your block, and Clinton raises
your taxes, well, kill Clinton, not me...
The following notations are used:
== Existing
$$ Modified
++ Added
Step 1:
Open BBS.C
Step 2:
Right after "int checkpw(void)" block read this funtion
++int checkpw1(void)
++{
++ char s[81], s1[81];
++
++ nl();
++ prt(7,"Enter the 5INIT7 password2 : 0 ");
++ echo=0;
++ input(s,20);
++ echo=1;
++ if (strcmp(s,(syscfg.systempw1))==0)
++ return(1);
++ else
++ sysoplog("6!@! 7Failed INIT Password"); /* write to the log */
++ sprintf(s1,"6%s 3tried enter 6INIT.",nam(&thisuser,usernum));
++ ssm(1,0,s1); /* sends you a SSM that the user FAILED! the password */
++ return(0);
++}
Step 3:
Right before "if ((strcmp(s,"REBOOT")==0) && (checkpw())) { " add this:
++ if ((strcmp(s,"INIT")==0)) {
++ if (checkpw1()) {
++ topscreen();
++ extramenu();
++ topscreen();
++ }
++ }
Step 4:
Add this at the VERY bottom of BBS.C:
++void extramenu(void)
++{
++ char s[161],s1[81],s2[161],s3[161],ch,ch1,*p;
++ int done,i,i1,i2;
++ float f;
++
++ done=0;
++ strcpy(s3,restrict_string);
++ strcat(s3,"01234");
++ do {
++ for (i=0; i<=15; i++) {
++ if (syscfg.newuser_restrict & (1 << i))
++ s2[i]=s3[i];
++ else
++ s2[i]=32;
++ }
++ s2[16]=0;
++ configfile=open("CONFIG.DAT",O_RDWR | O_BINARY);
++ if (configfile<0) {
++ printf("CONFIG.DAT NOT FOUND.\n");
++ return;
++ }
++ read(configfile,(void *) (&syscfg), sizeof(configrec));
++ close(configfile);
++ sprintf(s,"%sSTATUS.DAT",syscfg.datadir);
++ statusfile=open(s,O_RDWR | O_BINARY);
++ if (statusfile<0) {
++ printf("6%s NOT FOUND. You TARD!!!!\n",s);
++ return;
++ }
++ read(statusfile,(void *)(&status), sizeof(statusrec));
++ close(statusfile);
++ nl();
++ npr("A. System 2 PW : %s\r\n",syscfg.systempw2);
++ npr("B. INIT PW : %s\r\n",syscfg.systempw1);
++ npr("Q. QUIT!\r\n");
++ npr("\r\n\r\n");
++ npr("Which ?");
++ ch=onek("ABCDEFGQ");
++ switch(ch) {
++ case 'A':
++ npr("\r7Enter new System 2 Password2: ");
++ gets(s1);
++ strcpy(syscfg.systempw2,strupr(s1));
++ break;
++ case 'B':
++ npr("\r7Enter new INIT Password2: ");
++ gets(s1);
++ strcpy(syscfg.systempw1,strupr(s1));
++ break;
++ case 'Q':
++ done=1;
++ break;
++ }
++ configfile=open("CONFIG.DAT",O_RDWR | O_BINARY);
++ write(configfile,(void *) (&syscfg), sizeof(configrec));
++ close(configfile);
++ }while (!done);
++}
Now, we have the init in, so lets make the System Two Password
Step 5:
add this after the "int checkpw1(void)" :
++int checkpw2(void)
++{
++ char s[81], s1[81];
++
++ nl();
++ prt(7,"Enter the 9DOS7 Password 2:0 "); /* NOTE 1 */
++ echo=0;
++ input(s,20);
++ echo=1;
++ if (strcmp(s,(syscfg.systempw2))==0)
++ return(1);
++ else
++ nl();
++ prt(6,"Wrong password Looser!");
++ nl();
++ sysoplog("6@!@! 7Failed DOS Password"); /* NOTE 1 */
++ sprintf(s1,"6%s 3tried to go to 6DOS.",nam(&thisuser,usernum));
++ ssm(1,0,s1);
++ return(0);
++}
Step 6a:
Close BBS.C
Step 6b:
Add this to the VERDEC.H (sorry, had to be done...) :
/* STATIC SYSTEM INFORMATION */ /* add in here */
++ char systempw1[21], /* INIT password */
++ systempw2[21]; /* System 2 Password */
Step 7a:
Re Open BBS.C hahahah
Step 7b:
Modify the DOS statement
== if (strcmp(s,"DOS")==0) {
++ if (thisuser.ar & 4) { /* NOTE 2 */
$$ if (checkpw2()) {
== sysoplog(get_stringx(1,6));
== shrink_out(getenv("COMSPEC"),1,1,1,0);
== topscreen();
== }
== }
++ }else{
++ if (checkpw()) {
++ sysoplog(get_stringx(1,6));
++ shrink_out(getenv("COMSPEC"),1,1,1,0);
++ topscreen();
++ }
++ }
Step 8:
Do the same for all of the other functions that you want your Remote
to have access to.. (ex:) :
== if (strcmp(s,"UEDIT")==0) {
++ if (thisuser.ar & 4) { /* NOTE 2 */
++ if (checkpw2()) {
== sysoplog(get_stringx(1,10));
== uedit(usernum,0);
++ }
++ }
== }
And that would make it so the Remote would have to enter the SysTem 2
Password to enter Uedit
Step 9:
Now, at the DOS prompt type "MAKE FCNS" and then COMPILE your WHOLE BBS!
if you have a XT, get a new computer, but if you have a 586, send it to me!
If you see any improvements, errors, pretty colors, write me an E-mail.
or if you just want to chat, send me an E-mail.
or if you think that you want some E-mail, send me an E-mail.
or if you use my mod, send me an E-mail.
or if you think that a gerbil is stuck up your butt, DONT send me an E-mail.
/* NOTE 1 */
I use the system two password for DOS, you might use it for something
else... (but what!?!?! and why!?!?!?)
/* NOTE 2 */
if you have a co-sysop, remote sysop, give him the ar of "C",
and for 7LAZER #154 @8560 give your little brother the "C" AR.. ehehe
Shadow Lord
22 @ 7458 WWiVnet 1 @1 HellNET
152 @ 7454 IceNET 18 @27455 WWiVLink
0The world is over populated. Delete it [Y/n]6_